home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
MacWorld 1999 January - Disc 2
/
Macworld (1999-01) (Disk 2).dmg
/
Serious Demos
/
Symbolic Composer 4.2
/
Environment
/
System
/
SYMBOL
/
Symbol Processors
/
Fill
/
fill-template
< prev
next >
Wrap
Text File
|
1998-10-23
|
469b
|
14 lines
fill-template symbol-pattern fill-symbols
Fills the symbols in symbol-pattern with the symbols that it takes from fill-symbols. The rests in symbol-pattern are not filled, but the rests in fill-symbols are used as fill symbols.
(fill-template '(a b (a b c) d e = g) 'a)
--> (a a a a a = a)
(fill-template '(a b (a b c) d e = g) '(a = b))
--> (a = b a = = b)
(fill-template '(a (+ 1 b c) d e = g)
'((-1 a b) b = (-2 a b)))
--> ((-1 a b) b = (-2 a b) = (-1 a b))